10 V=15:POKE53280,.:POKE53281,.:PRINTCHR$(147):POKE53272,23:PRINT""
20 PRINT"                     [176][184][184][184][184][184][184][184][184][184][184][174]":
40 PRINT"[159]                     [181]          [182] "
45 PRINT"                     [173][185][185][185][185][185][185][185][185][185][185][189]       "
50 :FORI=1TO20  STEP.1
60 ONIGOSUB180,240,300,360
90 FORZ=1TO50:NEXT:PRINT"";:NEXT
130 ONIGOSUB180,240,300,360:
140 FORZ=0TOVSTEP-2  :NEXT: NEXT    :GOTO50
150 FORZ=VTO33
180 POKE1569,69:POKE1570,78:POKE1571,68:POKE1572,69:RETURN
240 POKE1569,45:POKE1570,45 :POKE1571,45:POKE1572,45:RETURN
250 PRINT"[144]"
300 POKE1569,197:POKE1570,206:POKE1571,196:POKE1572,197:RETURN
360 POKE1569,45 :POKE1570,45 :POKE1571,45:POKE1572,45:GOTO370
370 POKE1569,69:POKE1570,78:POKE1571,68:POKE1572,69:FORZ=0TOVSTEP.8
375 POKE1569,45 :POKE1570,45 :POKE1571,45:POKE1572,45:
380 POKE1569,197:POKE1570,206:POKE1571,196:POKE1572,197:           :NEXT